Top 10k strings from Strip Jack (1984)(J. Weigner - M. Reimann)(de).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /

Back to the directory listing

   2 xVxxVxxVxxVxxVxxVxxVxxVx
   2 vww]ww3wqy6
   2 j*(a+p+q"(a
   2 `GGGGGGGGGGGG
   2 WWWVVVVVVVVVVVVVVVV
   2 VVVVVVVVVVVV
   2 UUUUUUUUUUUUUUUU
   2 UUUUUUUUUUUUUUT
   2 GGGGGGGGGGGG
   2  Shimon Young 1988    DISCiPLE to Tape 48K snap
   2  GGGGGGGGGGGG
   1 xxxxxxxxxxxxxxxxF
   1 vww]ww3wqy
   1 legre-eGhrd
   1 frdIe-e;qWx
   1 d*(a^#V#"(a
   1 crd,qIe,q:c
   1 aa|a`i^#V+
   1 a*(a++++"(a
   1 __________________________
   1 ZAP                              
   1 WHITE LIGHTNING  
   1 WA2 0 7 24 18 WIN ATTDNV 2 DEL LOOP ;                           40813 VARIABLE TIT : M2 22 1 DO 19 10 DO J I TIT @ C@ -DUP IF   
   1 StripTEASE
   1 SCORE @ -DUP IF DUP 0 > IF 200 / GIRLS ELSE DROP ENDIF ELSE     1 FIM ! ENDIF 0 6 COR 21 17 AT ." $ " SCORE ?  FIM C@ UNTIL ;   
   1 POE ENDIF TIT @ 1+ TIT ! 3 +LO
   1 OP LOOP ; : JOG 0 FIM !    
   1 LENGTH IS  lj3y
   1 INK             
   1 EMPTY-BUFFER
   1 DEFINITION
   1 COR ; : WA1 7 0 COR 0 8 1 16 WIN SETAV ; : WA2 7 0 COR 0 7 1 18 WIN SETAV ; : MOS1 12 0 DO WA1 0 7 24 18 WIN 2 DEL ATTDNV       
   1 CENSURADOVa
   1 Bd`d*(a^#V#s#r
   1 ?oc<eVeVax\
   1 : WAYS 0 0 COR 25 0 DO 0 0 I I 8 + WIN SETAV 40 50              BLEEP 20 30 BLEEP 10 30 BLEEP 10 50 BLEEP LOOP 0 BORDER 0 6     COR ; : WA1 7 0 COR 0 8 1 16 WIN SETAV ; : WA2 7 0 COR 0 7 1 18 WIN SETAV ; : MOS1 12 0 DO WA1 0 7 24 18 WIN 2 DEL ATTDNV       WA2 0 7 24 18 WIN ATTDNV 2 DEL LOOP ;                           40813 VARIABLE TIT : M2 22 1 DO 19 10 DO J I TIT @ C@ -DUP IF   POE ENDIF TIT @ 1+ TIT ! 3 +LOOP I 20 AT TIT @ C@ . TIT         @ 3 + TIT ! 3 +LOOP ; -->                                       : PONTUACAO 40813 TIT ! 150 120 DO 0 I TABELA C! LOOP           3 0 DO WAYS CLS MOS1 M2 0 0 AT KEY DROP LOOP ; : JOG 0 FIM !    80 SCORE ! CLS LIMP GIRL1 0 6 COR 21 17 AT ." $ " SCORE ?       BEGIN 0 0 AT 1 1 COR KEY DROP SCORE @ 2 - SCORE                   ! 0 6 COR 21 17 AT ." $ " SCORE ? RODA GANHA?                 GANHOU @ -DUP IF DUP SCORE +! MOEDAS ENDIF                      SCORE @ -DUP IF DUP 0 > IF 200 / GIRLS ELSE DROP ENDIF ELSE     1 FIM ! ENDIF 0 6 COR 21 17 AT ." $ " SCORE ?  FIM C@ UNTIL ; 
   1 : WAYS 0 0 COR 25 0 DO 0 0 I I 8 + WIN SETAV 40 50              BLEEP 20 30 BLEEP 10 30 BLEEP 10 50 BLEEP LOOP 0 BORDER 0 6     
   1 88888888888888888888888888888888
   1 8888888888888888
   1 80 SCORE ! CLS LIMP GIRL1 0 6 COR 21 17 AT ." $ " SCORE ?       BEGIN 0 0 AT 1 1 COR KEY DROP SCORE @ 2 - SCORE                 
   1 2 OF TWO ENDOF
   1 *(a++"(as#r
   1 )dId*(aN#F#"(a
   1 #"a\"c\"e\*
   1  OASIS SOFTWARE 1984 
   1  LOAD 4 LOAD 11 LOAD 5 LOAD
   1  13 5 213 6 11 201 6 4 204 POE POE POE POE POE ;                                                   : GIRLS CASE 0 OF GIRL1 ENDOF 1 OF GIRL2 ENDOF 2 OF GIRL3 ENDOF 3 OF GIRL4 ENDOF ENDCASE ; -->                                  
   1   ! 0 6 COR 21 17 AT ." $ " SCORE ? RODA GANHA?                 GANHOU @ -DUP IF DUP SCORE +! MOEDAS ENDIF